B

B

D

Câu 1 :

Tham khảo

Y tưởng : xét từng số hạng trong dãy nếu số hạng > 0 thì xếp vào một biến tổng rồi chia cho số hàng đã xếp được

Input : Dãy A gồm N số nguyên a1....aN;

Output : Trung bình cộng của  các số dương;

B1 : Nhập N số nguyên a1.... aN;

B2 : TB <--- 0, dem <---- 0, i <---- 1, Tong <--- 0;

B3 : Nếu a[i] > 0 thì Tong <--- TB + a[i];

B4 : dem <--- dem + 1;

B5 : Nếu i > N thì đưa ra màn hình kết quả TB = Tong/Dem rồi kết thúc chương trình;

B 6 : i <--- i + 1 rồi quay lại B3;

Câu 2 :

Tham khảo

Ta nhận thấy rằng, bội số chung nhỏ nhất của hai số nguyên dương a, b có thể được tính theo công thức:

ab/d

trong đó d là ước chung lớn nhất của a và b.

Bởi vậy:

Nên viết hàm để tính bội chung nhỏ nhất của hai số nguyên dương vì chương trình con cần trả ra một giá trị;

- Hàm tính bội chung nhỏ nhất của hai số nguyên dương a, b cần sử dụng hàm tính ước chung lớn nhất của a và b.

- Hàm tính ước chung lớn nhất của hai số nguyên dương a, b:

function ucln (a, b: integer): integer;

var r: integer;

begin

while b>0 do begin

r: = a mod b ,a : = b ; b:= r; end; ucln:= a; and;

- Hàm tính bội chung nhỏ nhất của hai số nguyên dương a, b:

This is a modal window.

lunction bcnn(a, b: integer): integer;

begin

bcnn:= a*b div ucln(a, b);

end;

Khi đó, chương trình con tính bội số chung nhỏ nhất của hai số nguyên dương a, b như sau:

program bai4_chuong6;

use crt ;

vai

X y: integer;

function ucln(a, b: integer): integer;

var r: integer;

begin

while b>0 do begin

r:= a mod b; a: = b ,b:= r;

end; ucln:= a;

end;

txnction bcnn(a, b: integer): integer;

begin

bcnn:= a*b div ucln(a, b);

end;

Begin

clrscr;

writeln('Nhap vao hai so can tim BCNN');

write ('x=') , readln(x); write ('y=') , readln(y);

writeln('bcnn cua hai so',x:4,'va',y:4,'la',bcnn(a,b)

readln

End.

Câu 3 : chịu

Program hoan_doi;

uses crt;

var x,y,temp:Integer;

begin

x:=3;y:=7;

Writeln('Gia tri cua x truoc khi doi: ',x);

Writeln('Gia tri cua y truoc khi doi: ',y);

temp:=x;

x:=y;

y:=temp;

Writeln('Gia tri cua x sau khi hoan doi: ',x);

Writeln('Gia tri cua y sau khi hoan doi: ',y);

Readln();

end.

Mô tả: Khai báo 3 biến kiểu số nguyên

-Ta gán 3 cho biến x, gán 7 cho biến y

-Sau đó gán giá trị của biến x cho biến temp (để lưu trữ giá trị của biến x);

-Ta gán giá trị của biến y cho biến x (lúc này giá trị của biến x đã bị đổi);

-Rồi gán giá trị của biến temp cho biến y (Giá trị không bị thay đổi theo biến x bởi vì trước khi thay đổi giá trị của biến x thành giá trị của biến y ta đã gán giá trị trước đó của biến x cho biến temp)

#include <bits/stdc++.h>

using namespace std;

long long a,b;

int main()

{

cin>>a>>b;

if (a<b) cout<<a;

return 0;

}

Thuật toán:

B1: Nhập số nguyên n

B2: Nếu n >0 thì in ra màn hình n là số dương; nếu n <0 thì in ra màn hình n là số âm; nếu n = 0 thì in ra màn hình n không dương cũng không âm.

B3. Kết thúc

Chương trình:

uses crt;

var n: integer;

begin

write('Nhap so N: '); readln(n);

if n > 0 then writeln(n,' la so nguyen duong') else if n = 0 then writeln(n,' khong la so am cung khong la so duong') else writeln(n, ' la so nguyen am');

c: 

#include <bits/stdc++.h>

using namespace std;

double a,b;

int main()

{

cin>>a>>b;

cout<<a*b;

return 0;

}

b) 

#include <iostream>
using namespace std;
int a;
int main(){
    cin>>a;
    if (a%2==0) cout<<a<<" la so chan";
    else cout<<a<< "la so le";
    return 0;
}

Tham khảo:

- Sơ đồ khối mô tả thuật toán tính tổng của hai số a và b.

- Đầu vào: hai số a và b.

   Đầu ra: tổng hai số a và b.

- Mô tả thuật toán theo cách liệt kê là:

+ Nhập giá trị a, giá trị b

+ Tính Tổng ← a + b.

In ra màn hình giá trị Tổng.

- Sơ đồ khối mô tả thuật toán tính tổng của hai số a và b.

- Đầu vào: hai số a và b.

   Đầu ra: tổng hai số a và b.

- Mô tả thuật toán theo cách liệt kê là:

+ Nhập giá trị a, giá trị b

+ Tính Tổng ← a + b.

In ra màn hình giá trị Tổng.

#include <bits/stdc++.h>

using namespace std;

long long a[10],i,t;

int main()

{

t=0;

for (i=1; i<=10; i++)

cin>>a[i];

for (i=1; i<=10; i++) if (a[i]%2!=0) t+=a[i];

cout<<t;

return 0;

}